5 * SEIMDE— UND EMPF ANGSROUT I NE UEBER V24 * 
jj -ft# 

3 * VEREINBARUNGSTEIL 2 UR SENSE -r UND EMPF ANGSROUT I NE UEBER V24 * 
ORG S000H 



hUF i dfiF‘ BEGIN 

5 1- MREB - SYSTEMPROGRAMME 



ilBSAZ: 


EQU 


0E37BH 


B SLOE s 


‘ EOU 


0E3B0H • 


ANZGs 


EQU 


GE36CH 


LAZRi 


EQU 


0E22&H 


FEGKR s 


EQU 


0E5G7H 


E I NAN s 


EQU 


0E55CH 


Ys 


EQU 


0E59DH 


CRC a 


EQU 


QESB1H 


TSCLs 

9 


EQU 


0E4AEH 


E 

I WEITERE EOU 


- VERE I NB ARUNGEN 


§OHs 


EQU 


01H 


STX s 


EQU 


02H 


ETX ; 


EQU 


03H 


ACK: 


EQU 


0&H 


NAK: 


EQU 


' 15H 


SYNs 


EQU 


1 h\ 1 


CAN i 


EQU 


1SH 


CRs 


EQU 


SDH 


MAXi i 


EQU 


0SH 


MAX 2 a 


EQU 


, 0E652H 


MAXZla 


EQU 


S5H 


MAX 22 a 


EQU 


0AH 


MAXZ3s 


EQU 


SAH 


MAX 24 a 


EQU 


0AH 


MAXzSs 


EQU 


OSH 


SIOBKs 


EQU 


003H 


SIOBDs 


EQU 


00 IH 


CTC2a 


EQU 


003H 



l EERE I CHSVERE I NB ARUNGEN 



i.AELii 


BER 


1 


ZAEL2a 


BER 


i 


ZAEL3S 


BER 


i n 


2AEL4T 


BER 


i 


ZftELSs 


BER 


i 


TIMED: 


BER 


i 


ANFANs 


BER 


l 


SBLOKs 


BER 


2 


EBLOKs 


BER 


•? 


STORES 


BER 


128 


STOR1 s 


BER 


2 



sBILDSCHIRM LGESCHEN 
aBS TE I LWE I BE LOESCHEN 
l TEXT ANZ EIGEN 
“SPRUNG INS BETRIEBSSYSTEM 
s FEHLERMELBUNG 
s ZEICHENKETTE EINGEBEN 
I Y/N ENT5CHE I DUNG 
3 B ILBUNG CRC REST 
l TASTATURABFRAGE 



; SENDEN ERLAUBT 
3 DATENBLOCK FOLGT 
3 UEBERTRAGUNG BEENBET • 

% CRC OKAY 
i CRC FALSCH 

I AB BRUCH BER VERB INBUNG 
? STEUERZEICHEN FALSCH 
b VERB INDUNGSAUFNAHME 
iBROSSE SCHLEIFE 
I KLEINE SCHLEIFE 
? VERSUCHE VERB I NBUNGSAUFNAHNE 
5 ,! SENDEN DESKRIPTQR 

5 11 SENDEN STEUERZEICHEN 

a 11 SENDEN DATENBLOCK 

3 " VERB INDUNGSAUFNAHME EMPFAE! 



§ CTC K ANAL 1 



ZAEHLER 



3 ZAEHLER GESENBETE BLDECKE 
-ZAEHLER EMPFANGENE BLOECKE 
5 ARBE I TSSPE I CHER 



TST0s 


DA 




BA 


DEV i 


BER 


i S } 1 : 


DA 




DA 


NAMES 


BER 


TST2i 


DA 




DA 


TYP: 


BER 



l TEXTE 



TXTEfls 


DB 


TXT02: 


DB 


TXT03a 


DB 


TXT04s 


DB 


TXT05: 


DB 


TXTB^s 


DB 


TXT07: 


DB 


TXTSSs 


DB 


TXT09s 


DB 


TXT 


DB 


TXT 11s 


DB 



H 



DEV 

DEV 

NAME 
NAME +5 
7 

TYP 

TYP 

2 



p DEVICE 



5 PRDGRAMMNAME 



5 PROGRAMMTYP 



V24MR s MRES-20 1 
' SENDEN 1 
'DEVICE? ’ 

* NAME i * 

'TYP s ‘ 

■ UEBERTRAGUNG FEHLERFREI ‘ 
‘SENDER STARTEM ’ 

1 EMPFAENGER STARTEN ‘ 

‘ VON * 

* MACH 1 

’ EMPFANGEN * 



I NIT SIO UND CTC 




BEGINS 


CALL 


I NS ID 


BEG 1 1 s 


JMP 


EMPFA 



\ VERB I NBUNGSAUFN AHME 



OERBAs 


LB 


A , OR 






CALL 


ZSENB 






CALL 


ZEMPF 


p EMPFANG QUITTUNG 




CMP 


§ 






JRZ 


BISKR-# 


p I = O. 




LB 


A, (ZAELi > 






INC 


A 






LB 


(ZAELi) 5 A 






CMP 


MAXZ1 


; MAX. VERSUCHSANZAHL ERREICHT? 




JRNZ 


VERBA-# 


sNEIN 




LB 


A ? SYN 


p J A- > ABBRUCH BER VERB INBUNG 




CALL 


ZSENB 






LB 


A , 5BH 


s FEHLER; 'KEINE VERB INDUNG 




LB 


C » S 1 H 






CALL 


FEGKR 




£ 


JMP 


ENBE 

/ 




l END E 


BER UEBERTRASUNS 




tNDs 


LB 


A.ETX 






CALL 


ZSENB 






LB 


HL , TXT06 


5 UEBERTRAGUNG FEHLERFREI 




LB 


B ? 0 




END is 


BJNZ 


END i — # 






LB 


BC= 17A0H 






CALL 


ANZG 






JMP 


ENBE 




l EMPFANG VON 


BATEN 




l EINGABE TYP 5 


DEVICE, STAR 


T EMPFANG 


InPFAs 










LB 


A.^TYP) 






CMP 


50H 






JRZ 


ENL—# 






CMP 








JKZ 


ENL—# 






LB 


A ? 50H 






LB 


L* ? 02 H 


s FEHLERCGBE 




CALL 


FEGKR 


p FEHLER AMZE I BE 




JMP 


l XI 






CALL 


¥ 


* 




JRZ 


ENLF-# 






LB 


BC 5 6060H 






CALL 


BSLOE 






JMP 


EMPFA 




ENLF s 


XOR 


A 






LB 


(ZAEL5) ,A 






LB 


(ANFAN) , A 






LB 


HL, 1 






LB 


(EBLOK) ,HL 




? VERB I NBUNGSAUFNABME 




FMVERs 


CALL 


ZEMPF 






LB 


B h h 


p RETTfcN GESsZlIcHlN 


l EMPFANGEN BESKRIPTOR UNB 


CRC 


LMBISi 


LB 


A, 1 






LB 


(ANFAN) «a 






LB 


B , 1 9H 






Lb 


Hll . STORE- i 






CALL 


EMPZ 


1 EMPFANGEN 34 ZEICHEN 


END 1 2 s 


LB 


HL 5 S 1 OkE 


1 CRC BILDUNG 




LB 


iiCp 1 /H 






CALL 


CRC 






LB 


A ? E 






CMP 


(HL) 






JRNZ 


EMB i # 


p CRC FEHLER 




INC 


HL 






LB 


A 5 B 






CMP 


( HL ) 






JRNZ 


EM3&I3-# 


s CRC FEHLER 




•JR 


EMBI I™# 


| CRC- OKAY 


EMB 1 3 s 


LB 


A ? NAK 






CALL 


ZSENB 






JR 



EMI) IS-# 



iNEUER VERSUCH 



| 

l ******** UNTERPROGRAHME 
I UP ZEICHEN EMPFANGEN MIT 



JeMPFs 


PUSH 


BC 




PUSH 


HL 




LB 


B 9 MAX 1 




LB 


BE , MAX2 




XGR 


A 




LB 


(TIMED) -A 


ZEMP3s 


LB 


HL.0 


ZEMP2s 


LB 

OUT 


siQBK 




IN 


SIGBK 




AND 


20H 




JRNZ 


FEHL1-# 




IN 


SIQBK 




BIT 


0 a A 




JRNZ 


ZEMP1-# ! 




INC 


HL 




PUSH 


HL 




XOR 


A 




SBC . 


HL , BE 




PGP 


HL' 




JRNZ 


ZEMP2-# 




DJNZ 


ZEMP3-# 




JR 


FEHL2-# 


ZEMPls 


IN 


SIDBB 


ZEMP4s 


POP 


HL 




POP 


BC 




RET 




f’EHLls 


LB 


A ? 5SH 




LB 


C 5 SbH 




CALL 


feskr 




CALL 


WSL 




Lb 


A * NAK 




CALL 


ZSENB 




JR 


RUECK—# 


FEliL.2 ‘ 


LB 

LB 

CALL 

LB 

LB 


A,50H 
C * SCH 
ffEGKR 

ft IMEO) 5 A 




LB 


A 5 CANFAN) 




CMP 


0 




JRZ 


ZEMP4-# 




CALL 


WSL 




LB 

CALL 


A.SYN 

ZSENB 


RUECK s 


POP 


HL 




POP 


BC 




POP 


HL 




JHP 


ENBE 


\ UP SENDEN 1 ZEICHEN 


1 SENDs 


PUSH 


BC 




PUSH 


BE 




PUSH 


HL 


I SEN is 


LB 


C, SIQBK 




IN 


B 




BIT 


2 , B 




JRZ 


zSENl— # 




OUT 


SIQBB 




POP 


HL 




. POP 


BE 




POP 


BC 




RET 




I WARTESCHLEIFE 


1 SEC 


WSLs 


LB 


BE , 1 000 




LB 


B « 95 


WSL i % 


DEC 


b£ 




LB 


A = E 




OR 


D ' 




JRNZ 


WSL1-# 




DJNZ 


WSL t— # 




RET 




| INIT 


S 1 0 s V24 


5 9600 BAUD 


SlQSTs 


BB 


1SH 



******** 

20 SEC. BERE I TSCRAFT 



5 FEHLER? 

; J A , ST ATUSFEHLER 
g ABFRASE LRS 
I ZE I CHEN BA? 
p Lf A 



5 MAX 1 NIGHT ERREICHT 
i FEHLER s 20 SEC BEWARTET 
5 ZE I CHEN EINLESEN 



g 1 SEC MARTEN 



;KEIN ZEICHEN DA 



fSEMDEPUFFER NIGHT LEER 



KANALRESET 






BB 


04H 


s POINTER 




BB 


44H 


sVORTEILER 16, STOP-BIT 




BB 


(MB 


s POINTER 




BB 


08H 


?DI 




BB 


03H 


1 POINTER 




BB 


0 L 1 H 


?S BIT, AUTOEMPFANS EIN 




BB 


05H 


I POINTER 




BB 


BEAH 


•8 BIT 3ENBEN EIN 


PORT: 


BB 


SIOBK 




IKS 10 


s > LB 


A 5 (PORT) 


- 




LB 


C - A 






LB 


B - 9 






LB 


HL , SIOST 






OTIR 






CTCIN 


s LB 


C , CTC2 






LB 


A ? 55H 






OUT 


A 




- 


LB 


A * 4 






OUT 


A 






RET 






\ EMPFANGEN VON 


ZEICHEN 




: B s 


ANZAHL 






= HLs 


ADR EMPFANGSPLIFFER-i 




EMPZs 


I Ml 


HL 






LB 


A. 1 


1 LR1 POINTER 




OUT 


SIOBK 






IN 


SIOBK 






AND 


7BH 


% AUSBLENBEN FEHLER 




JRNZ 


FEMI—# 


: STATUSFEHLER 




PUSH 


BC 






LB 


B E 3®H 


jWSL CA* 1,5 MIN 




LB 






EMW: 


IN 


SIOBK 






BIT 


0 , A 






JRNZ 


N2BA— # 


5 ZEICHEN BA 




DEC 


BE 






LB 


A 5 E 






OR 


B 






JKNZ 


EMN-# 






. BJNZ 


EMN-# 






POP 


'BC 






JMP 


FEM2— # 




NZBAs 


PDF' 


BC 






IN 


SIQBD 






LB 


< HL ) ,A 






BJNZ 


EMPZ-# 






RET 




* 


FEMI e 


LB 


A 5 50H 






LB 


C = 8 BH 






LALl, 


FEGKR 






JR 


FEME-# 




FEM2 1 


. LB 


ft,S0H 






LB 


C = 8 CH 






CALL * 


f£gkr 




FEME ; 


POP 


HL 


% RET-ABR 




JMP 


ENDE 




% SENDEN VOW ZEICHEN 





5 HL : ADR SENSE PUFFER— 1 



SENBR : 


INC 


HL 






LB 


A, (HL) 






LB 


C, SIOBK 






IN 


B' 






BIT 


2 x B 






JRz 


fSfv-# 


I SENBEPUFFER SID VOLL 




OUT 


SlOBB 


' 




PUSH 


BC 






LB 


B =0 




NSW 1 s 


BJNZ 


NSW i —# 






POP 


BC 






IN 


B 






BIT 


2 9 B 






JRZ 


FSPV-# 


; ZEICHEN NICHT ABGESETZT 




BJNZ 


SENBR—# 






KET 






FSF'V: 


POP 


HL 


1 RET— ABR 






A a 5iSH 






LB 


C . SAB 






CALL 


f£gkr 






JMP 


ENDE 




| 


END 








external 

external 

external 



KP * I NIT 
KS.BRKMB 
KU. BERT 



LIST ON 
ABCLIST OFF 



i: fr JUGENDOBJEKT s V24 VERBINBUNG ABTEILUNS TM1 * 
= # , -s- 

;* SENDE- UNB EMPFANGSRGUTINE MRES KASSETTE * 

1 -S' -S-S- -fi- -S’ -Jf-'M-'S' ■£■■£"£■■&■ -S’ -&■&■ ■£ ■&■#-■$■-&■'£■ “it ■& 



ORG 4SBSH 

f LB (RET I X ) ? X X 

LB ( RET I Y > 9 I Y 

JMP BEGIN 

s EQU-VEREINBARUNGEN 



SOHs 


EQU 


STXi 


EQU 


ETXs 


EQU 


ACKs 


EQU 


NAKs 


EQU 


SYNs 


EQU 


CANS 


EQU 


CR i 


ESU 


MAX 1 s 


EQU 


HftX2s 


EQU 


MAXZls 


EQU 


MAXZ2: 


EQU 


MAX 23s 


EQU 


HAXZ4s 


EQU 


MftXZSs 


EuU 


SIOBKs 


EQU 


SIQBBs 


EQU 


CTC2s 


EQU ’ 


BbLO^s 


EQU 


AMzGs 


EQU 


BAADRs 


EQU 


LAZRs 


EQU 


FEGKRg 


EuU 


E I NAN s 


EQU 


v i 


EQU 


CRC Rs 


EQU 


s SuL s 


EQU 


ABRs 


EQU 


HXBCOg 


EQU 


HXBCUs 


EQU 


l SPRUNBVERTEII 


INI I s 


JMP 


BRKHB z. 


JMP 


BERTs 


JMP 


Begins 


CALL 

LB 

LB 

LB 

LB 

LB 


BEGI i i 


CALL 

LB 

LB 

CALL 

CALL 

JRZ 

LB 

OUT 

LB 

LB 

LB 

LB 

JMP 


TX1 i 


LB 

i Tt 




ItimL 

CALL 

CALL 

JRZ 

LB 

LB 



CALL 
J HP 



B1H 

S2H 

03H 

B6H 

15H 

16H 

1SH 

0BH 

20H 

GE652H 

05H 

OAH 

0AH 

OAH 

05H 

S3H 

BIN 

S5H 

0E37BH ' 

0E3&CH 

30H 

0E226H 

0E507H 

0E55CH 

QE59BH 

0ESB1H 

0E4AEH 

0E576H 

0E64SH 

BE659H 



KP. I NIT 
KS.BRKMB 
KU. BERT 



INSIO 

a <t as 

(TZBIS) ? A 
(TZEMP) , A 
A - 1 

(hNFAN) s A 
BSlOE 
HL,TXT 01 
BU, 120L'H 
ANZB 

Y 

TX1“# 

A » 33 
SlH 

A , 0FFH 
I 5 A 

IX. (RET I X) 
iv; (RETIY) 
LA2R 

HL.TXT02 
BC 5 0720H 

mm 

Y 

SENBE-# 
HL.TXTI 1 
BC. 0A20H 
ANZB 
EMPFA 



s RET TEN I X -REGISTER 
i RETTEN I Y-RES I STER 



; SENBEN ERLAUBT 
?ES FOLGT EIN BATENBLOCK 
; UEBERTRAGUNG BEENBET 
i CRC— REST O.K. 
s CRC— REST FALSCH 



ABBRUCH BER VERB INBUMS 
STEUER Z E I CHEN FALSCH 
VERB I NBUNGSAUFNAHME 

32 HAL BROSSE BCHLEIFE EHPF. 1 ZE 

58962 HAL KLEINE SCHLEIFE EMPF- 1 ZEI 
5 HAL VERSUCH VERB I NBUNGSAUFNAHME SE 
10 HAL Sl SENBEN DESKRIPTQR 
10 HAL iE f* STEUERZEICHEM 

10 HAL 51 11 BATENBLOCK 

5 HAL VERSUCH VERB I NBUNGSAUFNAHME EHP 



i PORT B KGHMANBG 
» PORT B DATEN 
i KANAL 1 

s B I LBSCK 1 RH LOESCHEN 
s TEXT ANZEIGEN 
I TORE AUF AKB GEMXCKKELT ’ 
l SPRUNG INS BETRIEB3SVSTEH 
; FEHLERHELBUNG 
\ ZEICHENKETTE EINSEBEN 
| Y/N ENTSCHEIDUNG 
* BZLBUNG CRC REST 
I T AST ATURABFRAGE 



lOBERES HALBBYTE IN ft 
I UNTERES HALBBYTE IN A 



? INITIAL I SI ERUNG SIQ UNB CTC 



% Es LOESCHEN 
| 1 V24MR MRES 20 1 

I V24 Y/N 



; PROGRAHMIEREN CTC 
| LADEN INTERRUPTREGI STEF' 

I ZURUECK INS BB 
; ‘SENBEN 1 

5 SENBEN Y/N 

5 SENBEN 
s 1 EpIF'FANGEN c 




PRENBg 


BER 


2 


ZEIGEs 


BER 


v \ 


PUFANs 


BER 


2 


ENDPUs 


BER 


2 


FILENs 


BER 


1 


TZBISs 


BER 


1 


TZEMPs 


BER 


1 


TASTSi 


DA 


SEITE 




DA 


SEITE 


SPITE: 


BER 


* 


TASTii 


DA 


PNBER 




DA 


PNBER+5’ 


PNBER: 


BER 


7 


TAST2: 


DA 


TYP 




DA 


TYP 


TYP: 


BER 


2 


BMi 


BER 


1 


RIGHT: 


BER 


1 


EA ! AB : 


BER 


14 


ZAEHLi 


BER 


2 


VERZ s 


BER 


32 


VERZ 1 : 


BER 


32 


ZS2H: 


BER 


i 


Z25B: 


BER 


i 


TYPPBi 


BER 


i 


ATR IBs 


BER 


1 


BYTAN i 


BER 


2 


BYTES: 


BER 


1 


DESPU: 


BER 


32 


SEPUFs 


BER 


S2H 


EMPUFs 


BER 


82H 


RETIX s 


BER 


2 


RET I Y : 


BER 


2 



? GROESSER NULL -> WE X TERSEFMDENENDE AUS 
. 7 pr TgFR 
s PUFFER ANFANS 
5 PUFFERENDE 
: AKT. FILEzAHL 
? TESTZELLE UP-TRDIS 

g TEST 2 , FUER RUECKSPRUN 6 AUS UP-ZEMPF 
5 K ASSETTENSE 1 TE A ODER B 



, 5 FILENAME 

5 PROBRAMMNAME „ EINGEGEEEN VON TASTATUR 
‘ T YP S ODER P ' 



5 BANDMARKE 

f 1 SENDEN 5 OS EMPFANGEN 
% . EREICH EA-TAEELLE 
% BLOCK ZftEHLER 
; I NH ALT S VERZ E I CNN I S 
; INHALTSVERZEICHNIS RETTEN ' 
sZAEHLER FUER DATEN SENDEN U. EMPFANGE 
I ZAEHLER FUER BESKRIFTOR SENDEN U* EMP 
? PROBRAMMTYP ( P/S ) 

5 ATRIBUT (B/ ) 

s SPEI CHER FUER BYTES ZUR ANZEIGE 
\ SPEICHER FUER BYTES ZUR ANZEIGE 
; DESKR I PTORPUFFER BE I EMPFANG 
5 SENBEPUFFER 
I EMPFANGSPUFFER 
| SPEICHER IK “REGISTER 
: SPE I CHER I Y— REG I STER 



END 



external 

external 

external 



KP« INIT 
KS« BRKMB 
KU. BERT 



LIST ON 
ASCLXST OFF 



5* JUGENBQBJEKTi V24 VERB INBUNG ABTEILUNG TMi * 

a: .H; 

5* SENBE- UND EMPFANGSRGUTINE FiRES KASSETTE * 





ORG 


400BH 




? 


LB '' 


(RET I X > 5 IX 


1 RETTEN I X— REGISTER 




LD 


(RETIY) , IV 


5 RETTEN I Y-REG I STER 




BMP 


BEGIN 




I EQU-VEREINBARUNSEN 


. 


SQHs 


EQU 


01H 


i SENDEN. ERLAUBT 


STX i 


EGU 


02H 


? ES FOLGT ein datenblock 


ETX s 


EQU 


03H 


s UEBERTRAGUNB BEENDET 


ACKs 


lQU 


©6H 


sCRC-REST G.K. 


NAK : 


EQU 


15H 


iCRC-REST FALSCH 


SYNi 


EQU 


16H 


% AB BRUCH DER VERB INDUNG 


CAN: 


EQU 


1SH 


i STEUERZEICHEN FALSCH 


CRs 


EQU 


SDH 


s VERB I NBUNGSAUFN AHME 


MAX i : 


EQU 


20H 


I 32 HAL GROSBE SCHLEIFE EHPF, 1 ZE 


MAX 2 s 


EQU 


BE652H 


s 58962 MAL KLEXNE SCHLEIFE EMPF = 1 ZEI 


MAXZls 


EQU 


05H 


g 5 MAL vERSUCH VERB INBUNGS AUFNAHME BE 


MAXZ2s 


EQU 


@AH 


5 10 MAL iE SENDEN DESKRIPTOR 


MAXZ35 


EQU 


0AH 


: 10 HAL M 11 STEUERZEICHEN 


MAXz4s 


EQU 


SAH 


: 10 MAL ,! “ DAT ENB LOCK 


MAX £5: 


EQU 


S5H 


;5 MAL VERSUCH VERB I NBUNGSAUFN AH ME EMP 


SIOBKs 


EQU 


S3H 


% PORT B KOHMANDO 


SIOBDs 


EQU 


S1H 


: PORT B DATEN 


CTC2: 


EQU 


05H 


iKANAL 1 


BSLOE: 


EQU 


0E37DH 


sBILDSCHIRM LOESCHEN 


ANZG^ 


EQU 


0E3&CH 


sTEXT ANZEIGEN 


BAAbRs 


EQU 


30H 


STORE AUF AKB BEWICKKELT 


LAZRs 


EQU 


SE226H 


% SPRUNG INS BETRIEBSSYSTEM 


FEGKRs 


EQU 


SE507H 


g FEHLER MEL DUNG 


El NAN i 


EQU 


©E55CH 


1 ZEICHENKETTE EINGEBEM 


Y : 


EQU 


0E59BH 


:Y/N ENTSCHEI DUNG 


CRCRs 


EQU 


0 ESB 1 H 


5 B I LDUNG CRC REST 


TSCL: 


EQU 


0E4AEH 


1 T AST ATURABFRAGE 


ADR: 


EQU 


0E576H 




HXBCQs 


EQU 


0E64SH 


% OBERES HAL B BYTE IN A 


HXBCUs 


EQU 


0E&59H 


% UN TERES HALBBYTE IN A 






SEMBEN VON DATEN 




SENSE ; 


LB 


A,S 


p ALLE ZAEHLER NULL 




LB 


(2AEL1 ) , A 






LB 


( ZAEL2) ;a 






LB 


(ZAELa) , A 






LB 


( ZAEL4) a A 






LB 


A, 1 






LB 


(RIGHT) ,A 






LB 


HL.B 


p AKTUELLE BLOCK— NR* NULL 




LB 


(SBLDK) 5 HL 




lE.NPN ; 


CALL 


PNAME 


sEINGABE PNAME UND TEST . OB BEREITS VE 




LB 


HL ? TXT07 


\ 1 STARTE SENDER * 




LB 


BC , 0FA3H 






CALL 


ANZG 






CALL 


Y 






JRZ 


VERBA"# 


, 1 




LB 


BC,6B60H 






CALL 


BSLDE 






JMP 


SENSE 




VERBA i 


LB 


A a CR 


5 VERB I NBUNGSAUFNAHME 




CALL 


2 SEND 






CALL 


ZEMPF 


2 EMPFANS QU I TTUNG 




CNF 


£ 


1 ZEICHEN GLEICH DOPPELPKT. ? 




JRZ 


DISKR-# 


pdft => WE I TER 




LB 


A, (ZAELi) 






INC 


A* 






LB 


(ZAELI) 5 A 






CMP 


MAX 21 


s MAXIMUM ERREICHT ? 




JRNZ 


VERBA-# 


% NEIN -> NEUER VERSUCH 




Ls 


A , SYN 


1 Aif BRUCH BER VERB INBUNG 




CALL 


zSlNB 






CALL 


TXVER 


p * FEHLERs KEINE VERB INBUNG AUFGENQMMEN 




JMP 


ENBE 




filSKRs 


CALL 


SENBI 


iSENBEN BES BESKR I PTQRS UND CRC-REST 




CALL 


ZEMPF 


k EMPFANG QU I TTUNG 




CMP 


NAK 


% CRC-REST FAL3CH ? 




JRNZ 


BISK1-# 


p NEIN => WEI TER 


SISK2i 


LB 


A, ( ZAEL2) 






INC 


A - 






LB 


(ZAEL2) , A 






CMP 


MAXZ2 


| MAXIMUM ERREICHT ? 




JRNZ 


Dl SKR-# 


p NEIN = > NEUER VERSUCH 




LB 


A , BYN 


p AB BRUCH BER VERB INBUNG 




CALL 


ZSENB 






CALL 


TXDSS 


1 ‘ FEHLERs BESKR IPTOR FALSCH UEBERTRAGE 




JMP 


ENBE 




BISK is 


CMP 


ACK 


l CRC-REST 0«K. ? 




JRNZ 


BISK2-# 


I STEUER ZEICHEN UNDER I N I ERT => WIEBERH* 


STEUZs 


LB 


A 3 STX 


pES FQLGT EIN BATENBLOCK 




CALL 


ZSENB 




-* 


CALL 


ZEMPF 


s EMPFANG QUI TTUNG 




CMP 


CAN 


s STEUERZEICHEN FALSCH ? 




JRNZ 


STEU1-# 


s NEIN = > WHITER 


STUE2s 


LB 


A, ( ZAEL3) 


' 




INC 


A 






LB 


( ZAEL3) ^ A 






CMP 


MAXZ3 


; MAXIMUM ERREICHT ? 




JRNZ 


STEUZ-# 


kNEIN = > NEUER VERSUCH 




LB 


A 5 SYN 


| AB BRUCH BER VERB INBUNG 




CALL 


ZSEMD 






CALL 


1 XbAT 


p ‘FEHLERs STEUERZEICHEN FALSCH GESENBE 




JMP 


ENBE 




STEUis 


CMP 


SOH 


s STEUERZEICHEN 0=K. ? 




JRNZ 


STUE2-# 


% STEUERZEICHEN UN3QEF I N I ERT => WIEBERH. 


l> A TEN; 


CALL 


SENBA 


1 SENBEN El NEB B AT ENB LOCKS 




CALL 


ZEMPF 


s EMPFANG QUI TTUNG 




CMP 


NAK 


; CRC-REST FALSCH ? 




JRNZ 


BATE!—# 


| NEIN = > WHITER 


BATE2; 


LB 


A 5 ( ZAEL4) 






INC 


A 






LB 


(ZAEL4) ,A 






CMP 


T1AXZ4 


; MAXIMUM ERREICHT ? 




JRNZ 


DATEN-# 


i NEIN => NEUER VERSUCH 




LB 


A „ SYN 


kABBRUCH BER VERB INBUNG 




CALL 


ZSENB 






CALL 


T XBAT 


p ‘ FEHLERs BATENBLOCK FALSCH UEBERTRAGE 




JMP 


ENBE 




BATE! g 


CMP 


ACK 


i CRC-REST 0„ K« ? 




JRNZ 


BATE2-# 


k STEUERZEICHEN UNBEF INI ERT WIEDERH. 


* 


CALL 


BAENB 


fALLE DATEN GESENBET ?pJ A=1 , N A^0 




CMP 


1 








JRZ 


END-# 


? JA ALLES GESENDET 




LB 


ft . (3 






LB 


( Z AEL3) 5 A 


s NEIN; ZAEL3/4 ZU NULL 




LB 


( ZAEL4) .ft 






LB 


HL, <SBLOK) 


l ERHOEHEN BLOCK— NR UM EINS 




INC 


HL 






LB 


(SBLOK) 5 HL 






JMP 


3TEUZ 


1 NAECHSTER BATENBLOCK 


tNCs 


LB 


A. ETX 


1 ENBE BER UEBERTRAGUNS 




CALL 


ZSEND 






CALL 


TXENB 


5 •’ UEBERTRA 6 UNG FEHLERFRE I BEENBET 1 




JrIP 


ENBE 




5 

5 ^iMfr#****'*'*# 


EMPFANG VON BATEN 


*S‘4W> ■-*■!#■ -S# •¥■ ■¥: ■& 4S- 


ImPFAs 


LB 


A,3 






LB 


(2AEL5) = A 






LB 


CANFAN) JA 






LB 


< RIGHT) 5 A 






LB 


HL 5 1 

<EBLQK> ,HL 






LB 






CALL 


EMF'Nft 




ENLs 


LB 


HL , TXT 8 S 


% START EMPFANG 




LB 


tfC , 1 3A0H 






CALL 


AN2B 






CALL 


V 






' JRZ 


EHVER-# 






LB 


BC, 6 ® 68 H 






GALL 


ESLQE 


/ 




JMP 


EMPFA 




EHVERs 


CALL 


ZEMPF 


\ VERB INDUNGS AUFNAHME 




Li) 


B, A 


l EETTEN ZEICHEN 




LB 


A = ( I I MeO ) 






CMP 


1 ' 






JRZ 


EMVE4-# 






LB 


A.B 






CMP 


S?N 






JRNZ 


EMVE1-# 




EMVE3 i 


CALL 


TXVER 


5 ‘ FEHLER 2 KEINE VERB INBUNG AUF6EN0MMEN 




JMP 


ENBE 




EliVE 1 2 


CMP 


CR 


? ZE I CHEN GLEICH CR ? 




J Rz 


EMVE2-# 


|JA —> ME I TER 


EMVE4; 


LB 


R » C t A&L5 ) 


. 




INC 


A 






LB 


( ZAEL^d ) . a 






CMP 


MAX 25 


s MAX I HUM ERREICHT ? 




JRNZ 


EMVER-# 


SNEIN = > NEUER VERSUCH 




LB 

uALl, 


A, SYN 
ZSEND 


\ AB BRUCH BER VERB INBUNG 




JR 


EMVE3-# 




EMVE2 s 


LB 


A 5 * i 


S&ENDEN QUITTUNG FUER VERB . -AUFNAHME 




CALL 


• ZSEND 




LB 


Ai i 




- 


Lb 


(Anfan) ,a 




iblDIS: 


CALL 


EDISK 


5 EMPFANGE N DES BESKRIPTORS UND CRC 




CALL 


CRCBI 


1 SOLL— 1ST— CRC GLEICH ?| J A* I , N 




CMP 


1 




JRZ 


EMDI1-# 


? CRC GLEICH => WE I TER 




LB 


A,NAK 


| CRC FALSCH 




CALL 


zSENb 






JR 


EMU IS-# 


sEMPF- DISKR. NOCH EINMAL 


END I i s 


Lb 


A , ACK 


1 QU I TTUNG FUER BISKR. 0=K= EMPFANGEN 




CALL 


ZSEND 


i 


FHSTEs 


CALL 


ZEMPF 


? EPFANO STEUER Z E X CHEN 




CMP 


SYN 


; ZEICHEN SYN ? 




JRNZ 


EMST i— # 


sNEIN => WEI TER 




CALL 


TXSTE 


; * FEHLERs STEUERBLOCK FALSCH * . 




JMP 


ENBE 




EliST i s 


CMP 


STX 


s ZEICHEN STX ? 




JRZ 


EMST2-# 


iJA = > ME I TER 




LB 


CAN 


; STEUER ZEICHEN FALSCH EMPFANGEN 




CALL 


ZSEN.U 




JR 


EMSTE-# 


sEMPF- STEURZ . NOCH E I NMAL 


EMST2 i 


LB 


A s SOH 


3 B ERE I T ZUM EMPFANG BATENBLOCK 




CALL 


ZSEND 




IhDATi 


CAl_i_ 


BATEM 


s EMPFANG BATENBLOCK UND GRC-REST 




CALL 


CRCBA 


3 SDLL— I ST— CRC GLEICH ?| J A=1 , N 




CMP 


1 






JRZ 


DATRA-# 


s JA => BATENTRANSPORT 




LB 


A.MAK 


| QUITTUNG FUER CRC FALSCH 




CALL 


zSenb 






JR 


bMBA f -# 


SEMPF- BAT. -BLOCK NOCH EINMAL 


DATRAs 


CALL 


TRADA 


s TRANSPORT BER BATEN AUF DATENTRAE 6 ER 




LB 


A = ACK 


\ SENBEN WEITERE BATEN ERLAUBT 






CALL 


ZSENB 






CALL 


ZEMPF 


% EMPFANG STUEERZEICHEN 




CMP 


SYM 


; ZEICHEN GLEICH SYN ? 




JRNZ 


EMBAl-# 


iNEIN -> NAECHSTER BLOCK 




CALL 


TXBAT 


p * FEMLERs DATENBLDCK FALSCH UEBERTRAGE! 




JMP 


ENBE 




EMBAls 


CMP 


ETX 


; ZEICHEN GLEICH ETX ? 




JRZ 


ENBE 1 ■=•# 


= JA = > . UEBERTRAGUNG ENBE 




LB 


HL, (EBLDK) 






INC 


HL 






LB 


CEBLOK) ,HL 






JMP 


EMSTi • 


p WE I TERN BLOCK 


V\ feNDEis 


CALL 


TRBIS 


5 SCHREIBEN BE 3 BESKR I PTORS ALJF KASSETTi 


^'1 


CALL 


TXEND 




ENBE? 


LB 


I X , EATAB 






LB 


< I X+4). . 21H 


p UMSPULEN 




CALL 


UP! 






LB 


(1X4-4) ? 41 H 


pLW AUS 




CALL 


UP1 


i 




JMP 


BEGIN 





I **-g-g‘* ****** UN f tRPROBRAMHE 



•UP ZEICHEN EMPFANSEN MIT 110 SEC. BEREITSCHAFT 



ZEMPF s 


PUSH 


BC 








PUSH 


HL 








LB 


B , MAX 1 








LB 


DE.MAX2 








LB 


A -6 








LB 


(TIMED) , A 






ZEMP3s 


LB 


HL 5 0 






ZEMP2s 


LB 


A, 1 








OUT 


SIOBK 




% LR1 POINTER 




iN 


SIOBK 




t ABFRAGE LR1 




AND 


2uM 




sMASKE ERROR OVERRUN 




JRNZ 


FEHL1-# 




i FEHLERi UEBERLAUF 




IN 


SIOBK 




? ABFRAGE LR0 




BIT 


Q » ft 




sEIN ZEICHEN IM PUFFER ? 




JRNZ 


ZEMP1-# 




% LA -> SPRUNG ZU ZEICHEN EINLESEN 




INC 


HL 




1 ZAEHLER ZU MAX2 ERHOEHEN 




PUSH 


HL 




l RETTEN INHALT HL 




XOR 


A 




sCR-FLASG RUECKSETZEN 




SBC 


HL , BE 




sTEBT OB MAX2 HERE ITS ERREICHT 




POP 


HL 




sRUECKLABEN INHALT HL 




JRNZ 


ZEMP2-# 




iNEIN => SPRUNG 




DJNZ 


ZEMP3-# 




s SPRUNG. WEN N MAXI NIGHT ERREICHT 




JR 


FEHL2— # 




s FEHLERs 20 SEC. AUF ZEICHEN GEWARTET 


ZEMP1 g 


IN 


S I OBI) 




k EINLESEN EIN ZEICHEN ALfS PUFFER 




LB 


(BYTES) «ft 








PUSH 


AF 








LB 


HL * BYTES 








CALL 


hx6co 








LB 


(BYTAN) ,A 








CALL 


HXBCU 








LI) 


(BYTAN+1) , 


A 






LB 


HL , BYT AN 




1 ANZEIGE AUF BS 




LB 


BC 5 02S0H 








CALL 


ANZG 








POP 


AF 






ZEMP4: 


pop- 


HL 








pop 


BC 








RET 








i EEVOR 


NAK GE 


SENDET WIRD, 


SOL 


LTE AUF BS FEHLERMELDUNB STEHEN 


FEHL1 t 


CALL 


TXFE1 




?“FEHLERs SID PUFFER OVERRUN” 




CALL 


PAU1S 








LB 


A = NAK 




5 NAK: BIO PUFFER OVERRUN 




CALL 


ZSENB 








JR 


RUECK-# 






s BEVOR 


SYN BESENDET WIRD, 


SOLLTE AUF BS FEHLERMELDUNB STEHEN 


^EHL2s 


LB 


A- 1 








LB 


(TIMED) = A 








LB 


A 5 (ANFAN) 








CMP 


0 








JRZ 


ZEMP4-# 








CALL 


TXFE2 




| "FEHLERs ZU LANGES WARTEN AUF ZEICHEN 




CALL 


PAU1S 








Lb 


A , SYN 




p SYN s TIMEOUT, ZU LANGES WARTEN 




CALL 


ZSENB 






RUECKs 


POP 


HL 




- % STAK ENTLASTEN VON UP-EINSPRUNG 




POP 


BC 




E I? 




LB 


ft 3 <TZEMP) 




| TEST s AUFRUF ZEMPF AUS UP ? 




CMP 


0 








JRZ 


RUECI-# 




s AUFRUF NIGHT AUS UP 




POP 


HL 




s AUFRUF AUS UP 


RUECi s 


POP 


HL 




f RUECKKEHR VON UP- ZEMPF INS HAUPTPROBR 






LB 


HL , ENBE 


• 




PUSH 


HL 






RET 






1 UP SENBEN EIN 


ZEICHEN 




ZLENBs 


PUSH 


BC 






PUSH 


BE 






PUSH 


HL 




ZSEN1 2 


LB 


C, SIOBK 






IN 


X> 


’ sABFRAGE LRO 




BIT 


2 , D 


% SENSE PUFFER LEER ? 




JRZ 


2 SEN 1 -■# 


sNEIN -> SPRUNG 




OUT 


3I0EB 


l SENBEN EIN BYTE 




LB 


(BYTES) , A 




PUSH 


Ah 






LB 


HL, BYTES 






CALL 


HXBCO 






LB 


(BYTAN) - A 






CALL 


HXBCU 






LB ' 


CBYTAN+l ) , A 






LB 


HL, BYTAN 


pANZEIGE AUF BS 




LB 


BC-@2iEH 




CALL 


AN 2 6 






POP 


AF 






POP 


HL 






POP 


BE 






POP 


BC 






RET 






Ieine sec= pause 


- 


PAUISs 


LB 


B , 4 




PAUis 


LB 


A ,250 


s 253 MILLI SEC= 




CALL 


NSCHL 


5 NARTEBCHLEIFE 




BJNZ 


PAU1— # 






RET 






l UiARTESCHLEIFEi 


INHALT VON A 


IN MILLI SEC= 


N5CHL i 


PUSH 


HL 






PUSH 


BC 


' 


. WS2s 


LB 


B. 104 




NS is 


LB 


HL.0FFFFH 






BJNZ 


MSi-# 






DEC 


A 






CMP 


0 






■JRNZ 








F’OP 


BC 






POP 


HL 






RET 






s INITIAL! SI ERUNS DER S I 0 AUF 


V24, 960S BB UEBERTRAGUNSSRATE 
§ EINGABEPORT KANALRESET 


_ SIQSTs 


BB 


1SH 




BB 


04H 


i F'U I NTER 




BB 


44H 


I VORTE I LER 16, STOP-BIT 




BB 


OlH 


5 POINTER 




BB 


00H 


sDI, KEIN INTERRUPT ERLAUBT 




BB 


03H 


“POINTER 




DB 


@C1H 


58 BIT, AUTOEMPFANG EIN 




BB 


05H 


s pointer 




BB 


0 EAH 


1 S BIT SENBEN EIN 


PORT 5 


BB 


SIOBK 


I MB IQs 


LB 


A, (PORT) 






LB 


c,A 






LB 








LB 


HL = S I OST 






OTIR 






5 INI TIALISI ERUNS DES CTC 




CTCINs 


LB 


C-CTC2 






LB 


A , 55H 






OUT 


A’ 


1 ZK=4 UEBERTRAGUNSSRATE 96O0 BB 




LB 


A e 4 






OUT 


A' 






RET 






sFEHLERAUSSCHRIFTEN AUF BS 




TXVERs 


LB 


A , 50H 


1 FEHLERs KLINE VERB INBUNG 




LB 


C,SiH 






CALL 


FESKR 






RET 






fxDIS: 


LB 


A , 50H 


P FEHLER 2 BESKR , F ALSCH 




LB 

CALL 


C 5 S2H 

FESKR 






RET 






f XDATs 


LB 


A , 50H 


5 FEHLERs STEUERZEICHEN FALSCH 0 ESENBEI 




LB 


C.83H 

FESKR 




CALL 






RET 



tXSTEs 


LD 


A.50H 


fFEHLERs STEUERBLOCK FALSCH 




L.D 


C „ S5H 






CALL 


FEGKR 






RET 






f XFEI s 


LD 


A , 5@H 


l FEHLERs SIO PUFFER OVERRUN 




LD 


C-SBH 






CALL 


FEGKR 






RET 






tXFE: 


LB 


A 5 50H 


1 FEHLERi ZU LANGES WARTEN AUF Z E I CHEN 


* 


LD 


c ; sch 




. V 


CALL 


FEGKR 






RET 






tXENBi 


LD 


HL , TXTB6 


% UEBERTRAGUNG FEHLERFREI 




LD 


B J 




ENDii 


BJNZ 


END 1 -# 






LD 


BC, 17 ASH 






CALL 


ANZG 






RET 







s EIN 6 ABE ZU SEND. PROG. , TEST OB VGRHANDEN q TXi ST ARTE EHPFhENGER 
i E I NS ABE LAUFWERK , K ASSET TENSE I TE 



PNAME s 


LD 


HC , TXT09 


z 

D 

> 

° 




LD 


BC,@340H 






CALL 


ANZG 






LD 


HL,TXT03 


1 LAUFUERK 




LD 


BC,0S6iH 






CALL 


ANZG 






CALL 


ADR 






LB 


I X . EATAB 






LD 


< IX+3) ,E 






LD 


HL . TXTi2 


5 KA3SETTENSE I TE 




LD 


BC.76BH 






CALL 


AN Ze 






Ld 


IY.TAST0 






CALL 


ei Nan 






LD 


HL-TXT04 


1 NAME 




LD 


EC q 674H 






CALL 


ANZG 






LB 


I ¥ ^ T AST 1 






CALL 


ei Nan 




: KASSETTE BEARBE I TEN 






LD 


IX .EATAB 






LD 


(IX) 5 0 


l BIT’ GERAET FRE I ' SET ZEN 




LD 


CIX+2) ,BAft»R 






CALL 


INIT 




g INTERUPTBETR 


IEB VQRB. 




M 100 S 


LD 


A , 55H 


l HIGH— TEX L VON QRG.ADR KV01 




LB 


I ¥ A 






I M2 








IN 


34H 


|PIO FRE I LE 8 EN 


I GERAET 


E IN * STATUS AUSNERTEN 






CALL 


S 1 AT 




g CRC—ZE I CHEN 


PR06RAMMNAME 




r! i © s 


LD 


HL „ PNBER 






LD 


BC , 6 






CALL 


LJRCR 






LB 


(PCRC) ,BE 




g DATEI 


AUF KASSETTE VORHANDEN 


r> 




CALL 


SUBAK 






JRNG 


Ml 2 -# 


% FILE AUF KASSETTE VORHANDEN 




LD 


A . 60H 






LD 


C , 9EH 






JMP 


FEHL 


g FILE NIGHT AUF KASSETTE 


gRETTEN 


DESKRIPTOR . 1LOCKZAEHLER LADEN 


Hi 2 s 


LB 


HL = (EATAB+7) 






LD 


BE ; DESPU 






LD 


MC , 32 






LBXR 








LB 


HL . (DESPU^-25) 






LD 


(PREND) 5 HL 




5 flARKE 


SUCHEN 


AUF KASSETTE 






LD 


HL 9 (EATAB+7) 


5 N~TE MARKE SUCHEN 




LD 


DE 5 23 






ADD 


HL 5 DE 






LD 


A, PI 






LD 


<BH> . A 






CALL 


SUCB Pi 






RET 






\ El NS ABE ZU EMPF ANGENES PROGRAM!*! , TEST OB BEREITS VORHANDEN 


EMPNAs 


LD 


I X , EATAB 






LD 


< I X ) , 0 


I B I T ' GERAET FRE I * SET ZEN 




LD 


(1X4-2) ¥ BAADR 






GALL INI T 

I INTERUPTBETRIEB VQRB, 
M200S 



EMPN 1 



BATE I 



I MARKE 
1 14 1 s 



LB 


A . 55H 


LB 


i ; a 


I M2 




IN 


34H 


LB 


HL » TXT IS 


LB 


BC.0440H 


CALL 


ANZG 


LB 


HL , TXT03 


LB 


BC,0S61H 


CALL 


ANZG 


CALL 


ABR 


LB 


CIX-s-3) , E 


Lb 


HL, TXT 12 


LB 


BC , 076BH 


CALL 


ANZG 


LB 


I Y « TAST0 


CALL 


El NAN 


LB 


HL 5 TXT04 


LB 


BC , 0674H 


CALL 


ANZG 


LB 


IV , TAST1 


CALL 


El NAN 


LB 


HL.TXT05 


LB 


BC=05S1H 


CALL 


an 2 6 


LB 


I Y, TAST2 


CALL 


El NAN 


LB 


A, (TYP) 


CMP 


50H 


JRZ 


EMPN1-# 


CMP 


53H 


JRZ 


EMPNi— # 


LB 


A , b@H 


LB 


C - 02H 


CALL 


FESKR 


JMP 


TX1 


CALL 


STAT 


LB 


HL « PNBER 


LB 


Bc;6 


CALL 


CRfJR 


LB 


CPCRC) , BE 



HISH-TEIL VON GRG.ABR KVB1 



PIO FREI LESEN 



NACH 



LAUFWERK 



SEITE 



NAME 



TYP 



FEHLERCOBE 

FEHLERANZEIGE 



FILE NIGHT VORHANDEN AUF KASSETTE 



AUF KASSETTE VC 
CALL SUBAK 

JRC M4 1 —# 

LB A.&0H 

LB C , 9GH 

JMR FEHL i FILE SCHON AUF KASSETTE 

SUCHEN AUF KASSETTE, BLOCKS AEHLERs =0 



LB 

LB 

CALL 

LB 

LB 

RET 



e -, 5 (ZEIGE) 
CBM) .A 
SUCBM 
ML, 0 
CZAEHL) 



N-TE MARKE SUCRE N 



HL 



I SENDEN 
SEND Is 



BESKRXPTGR UNB CRC-REST 



toizIN i I 



LB 

LB 

t_-ALf_ 

LB 

LB 

LB 

LB 

LB 

CALL 

INC 

LD_ 

DEC 

LB 

CMP 

JRNZ 

RE l 



HL,DESPU 
BC» 23 , 
CRfcR 

<BESPU*23> 
HL-DESPU 
A, 25 
(225B? , A 
A , M 
7 SEND 
HL 

A. CZ25B) 

A r 

CZ25B) _A 
0 

SEN I i“# 



BE 



I EMPFANG 
EBISKs 



ED I Sis 



BESKRIPTOR UNB CRC-REST 



LB 


A, 1 


LB 


CTZEMP) ,A 


Lb 


HL,BESPU 


LB 


A .25 


LB 


(Z25B) * A 


CALL 


ZEMPF 


LB 


M,A 


INC 


HL 


LB 


A, (Z25B) 


DEC 


A 


LB 


CZ25B) , A 


CMP 


0 






JRNZ 

LB 

LB 


EBIS1-# 

A = 0 

(TZEMP) ¥ A 










RET 










1 TEST s 
CRCDIe 


CRC— REST 


SESKRIPTOR G= L 


r 

<• : 






LB 


HL , BESPU 










LD 


SC, 23 










CALL 


CRt-R 










LB 


HL 5 (BESPU+23) 










XOR 


A 








* 


SBC 


HL 5 BE 










RZ 


CRCI1-# 








! 


v \ .B 


A , 0 


l CRC— REST 


NIGHT 


0. K- 




'S' JR 


CRC I 2-# 








CRCIi : 


LB 


A ? i 


l CRC— REST 


1ST 0. 


K, 



CRC I 2s iEJ 

“TRANSPORT BESKRIPTGR AUF BAND 



s ABSCHLI ESSEN 


FRQ6RAMM AUF KAS 


SETTE « MARKE SCHRE I BEN 


TRBISi call 


KAVOR 




- LB 


< I X -s-4 > ? 5IH 




CALL 


UP2 




LB 


HL , (PUFAN) 


; HARKEN BLOCK SCHRE I BEN 


LB 


BE, < PUFAN) 




INC 


BE 




LB 


n*m 




LB 


BC ? 3I 




LBIR 

LB 


HL, (PUFAN) 




LB 


A, (ZEIGE) 




INC 


A 




LD 


H 3 A 


1 MARKENNR- 


LB 


(1X4-10) t 2@H 




LB 


<EATAB+^) , HL 




LB 


(1X4-4) ,0 




CALL 


UP2 




LB 


(1X4-4) ,6iH 


1 SCHLUSSLUECKE 


CALL 


UP2 




? I MHALTSVER Z E I CHN 1 3 SCHRE I E EH 


IN BER VERZ 


LD i 


HL , MERZ 




LB 


BE , VERZ4-1 




LB 


EC ,32 
A,20H 




LB 




LB 


(HL) , A 




Li* I R 






LB 


HL , BESPU 




LB 


BET VERZ 




LB 


BC , 23 




LDiR 

LB 


HL.PNBER 




LD 


BE, VERZ 




LB 


EC ,6 




LBIR 




s PARAMETERTABELLE IN vi 


- LB 


HL , ZEIGE 


“ MARKE 


LB 


BE , VERZ 4-23 


LB 


bc ; 2 




LBIR 

LI) 


HL » ZAEHL 


p BLDECKE 


LB 


bc;2 




LBIR 

s BEREICH ZEXG! 


E AKT « 





LB 


A 3 (ZEIGE) 


INC 


A 


LB 


(ZEIGE) -A 


LB 


CZEXGE4-Z) = A 



s PARAMETERTABELLE AUF KASSETTE E I NTRA6EN 
» UMSPULEN _ 



UMBs CALL 

s 2— i E BN SUCHEN 


UMSPU 




LB 


(1X4-10) ,2 




LB 


(1X4-4) -71H 




CALL- 


UP 2 




LB 


(1X4-4) ,02H 


\ BLOCK VORSTZEN 


CALL 


UP2 




i ZEIGERBLOCK LE 


SEN 




LD 


C 1X4-4) ? 02H 




CALL 


UP2 




LD 


D 5 (IK4S5 




LB 


E « ( iX+7) 




LD 


A , <DE> 




crip - 


m ' 


5VGL. ,OB ZEIGERBLOCK 


JRNZ 


- UMS-# 


INEIN 


INC 


BE 




LB 


HL, ZEIGE 


fAKT.ZEIGER IN PUFFER 


LD 

LBIR 


BC , 3 






s NEUEN 2E I GERE LOCK RETTEN 

* t -T^ I ii /r ATAB. 



■ r 


LB 


HL, (EATAB-f-7) 




LB 


bc : 32 




LB 


BE 3 VERZ 1 




LBIR 




s NEUEN 


ZEI6EREL0CK SCHREIBEN 


On s 


CALL 


UHSPU 




LB 


(IX + 105 ,2 | 2* BM SUCHEN 




LB 


<IX+4),?1H 




CALL 


UP2 




LB 


( T X+4) * 02H g BLOCK * AUSGLE I CH . - . ‘ 3UCI 




CALL 


UP2 




LB 


HL , (EATAB+7) 




LB 


A , 20H 




CHF* 


M % VGL K 20H 




JRNZ 


| MIGHT GEEUNBEN 




LB 


HL = VERZ 1 




LB 


BE, (EATAB+7) 




LD 


BC 5 32 




LBIR 




l NEUEN 


ZEIGER 


IN ZEIGERBLOCK SCHREIBEN 




LB 


(IX-4-4) ,0 




CALL 


UP2 


sSUCHEN BES PLATZES FUER I NH ALTSVERZE I CHN I SBLOCK 




LB 


A, (ZEIGE) 




BEC 


A 




BEC 


A 




JRZ 


E1-# si .FILE (SONBERFALL) 




LB 


B .ft 


SUFs 


LB 


(IX*4) ,02H s BLOCK VORSETZEN N-MAL 




CALL 


UP2 




BJNZ 


SUF-# 


g VERZE 


I CHN IS 


SCHREIBEN 




LB 


•HL . VERZ ?VERZ IN PUFFER 




LB 


BE. CPUFAN) 




LB 


BC 5 ' 32 




LBIR 






Ll> 


( I X4-4 ) 5 0 s BLOCK SCHRE I BEN 




CALL 


UP2 




RET 




l SCHREIBEN SEKTOR AUF KASSETTE ... . 


3 BLQCKLAEMGE 


LADEN ¥ PUFFER ANF = IN E/A-TABELLE 


TRABAs 


LB 


I X , EATAB 




LB 


(IX+1B) ? 12S 




LB 


HL-EMFUF 




LB 


Clft+8),H 




LB 


< IX-s-7) , L 




CALL 


SCHSK 




RET 




s SENDEN ElNES BATENBLOCKS UNB CRC-REST 


SENDAs 


LB 


A = i ZAEL4) 




CMP 


0 




JRNZ 


SENB2— # 




CALL 


BLUES 


SEMD2s 


LB 


HL , SEPUF 




LB 


BC 5 S0H 




CALL 


CRCR 




LB 


(SEPUF-i-SSH) 5 BE 




LB 


HL, SEPUF 




LB 


BC-S2H 


SEND Is 


LB 


<Z&2H) ,BC 




LD 


A,M 




CALL 


ZSEND 




INC 


HL 




LB 


BC. < Z82H) 




BEC 


BC * < 




LB 


(ZS2H) .BC 




LB 


ft = 0 




CMP 


B 




JRNZ 


SENS 1 




CMP 


C 




JRNZ 


SEND i — # 




LD 


HL 5 (PREND) 




BEC 


HL 




LB 


(PREND) 5 HL 




RET 




l EMPFANG VON 


DATEN UNB CRC-REST 


B ATEN s 


LB 


A . i 




LB 


(TZEMP) ,A 




LB 


HL , EliPUF sESSi0H 




LB 


BC , S2H 


IiA1 E “ 


LB 


< ZS2H) , BC 




CALL 


ZEMPF 




LB 


M 5 A 




INC 


HL 






LD 


BC ? (Z82H) 




DEC 


EC 




LB 


( ZS2H) , BC 




LB 


A s S 




CMP 


B 




JRNZ 


BATE”# 




CMP 


C 




JRNZ 


BATE-# 




LB 


A,B 




LB 


(TZEMP) ,ft 




RET 




1 TEST s 


CRC-. fc. 


T BATEN O.K. ? 


CRCBAs 


LB 0 


HL.EMPUF ' 




LB ’ 


; BC , BGH 




CALL 


CRCR 




LB 


HL, (EMPUF+S0H) 




XOR 


A 




SBC 


HL, BE 




JRZ 


CRC A 1 —# 




LB 


A = 0 




JR 


CRCA2-# 


CRCAii 


LB 


A, i ' 


CRCA2: 


RET 




\ TEST s 


ALLE BATEN GESENBET ? 


DAENBs 


LD- 


HL, CPKENB) 




LB 


A 5 i 




CMP 

RNZ 


H 




CMP 

RNZ 


L 




LB 

RET 


A, 1 


i STATUS ABFRASEN 


ST AT s 


LB 


CIX+4) , 31 H 




CALL 


UP1 




BIT 


4 3 ( IX ) 




JRZ 


8 f i~# 




LB 


A = 60H 




Lb 


C 1 9SH 




JR . 


fEhl-# 


ST Is 


BIT 


3 . < I X ) 




JRZ 


ST11-# 




LD 


A, (SEITE) 




CMP 


42H 




JRZ 


ST2-# 




JR 


ST 12—# 


ST 1 1 s 


LB 


A, (SEITE) 




CMP 


4iH 




JRZ 


ST2-# 


ST 


LB 


A = 60H 




LB 


C 5 99H 




JR 


F£HL~# 


ST2s 


BIT 


2 5 ( JX ) 




J R Z 


ST3“# 




LB 


A * 60H 




LB 


C * 9 AH 




JR 


FEEHL-# 


ST3i 


BIT 


1 / T V ^ 

JL * \ A A / 




JRZ 


ST4-# 




LD 


A.60H 




LB 


C.9BH 




JR 


FEHL-# 


ST 4 s 


BIT 

RZ 


7.(1 X ) 


r14s 


LB 


A ? 60H 




LB 


C ^ ( I X-t-i ) 


s FEHLERAUSNERTUNS STATUS KliBG 


FEHL i 


LB 


( I X-*-4> 5 4 1H 




CALL 


UP1 




CALL 


FEGKR 




LD 


BC , i3C040H 




CALL 


BSLOE 




POP 


HL 




POP 


HL 




JMP 


BEGIN 


l LESEN 


EIN BA 


TENBLOCK 



s CRC— REST NIGHT 0„K. 
% CRC— REST IBT Q.i< = 



?NEIN 
INEIN 
\ J A 

; KOHMANBO ' SER AET E I N * 

| 6ERAET BEREIT">Z— 1 

jKASS.SE I TE A G= B? Z»1->SEITE A 
j SEITE B ‘ - 

j FEHLERHELBUNB 
% SEITE A 

j ALJFZE I CHNEN ERLAUBT 

l KE I N DATENTRhEGERENBE Z=1 

jFEHLER Z=0 
5221 

I GERAET AUS 
I FEHLERMELBUNG 

: STACK ENTLASTEN 
s STACK ENTLASTEN 



ERG. i Z=1 « A»Bs LEERBLOCK C MIGHT MEHR UEBERTRABEN 
5 Z=1 ;a=i sLETZTER zu uebertragenber block 

BLLESs CALL KAVGR 

LB <IX+4),02H 

CALL UP2 

LB H,(IX<-S) 

LB L , ( I X-*-/ ) 

LB BE , SEPUF 






LD 


BC, 128 






LBIR 








RET 






5 SUCHE 


BANBHARKE 




5 BED. s 


BER-BM 


SELABEN HIT ZU SUGHENDER BM 


SUC BM: 


LB 


A, (BM) 






LB 


(IX+10) * A 


^ MARKE 


SUCB2§ 


LB 


( IX+4) ,71H 


j BM SUCHE N VQRW. 


SUCB 1 5 


CALL 


UP 2 






LB 


A, (I X+7) 






LB 


B, (IX+8) 


sPRUEFEN OB BM 




OR 


B 






JRNZ 


BMVOR-# 


s KEINE BM 




LB 


(IX+4) ,02 


;MARKENBLOCK LESEN 




CALL 


UP2 






LB 


HL. (EATAB+7) 






LB 


A. (EM) 






LB 


b:a 






LB 


A \ M 






CHP 


B 






RZ 




s GEFUNDEN 




JRC 


BMVOR-# 






LB 


< I X+10) , 2 






LB 


(IX+4) ,75H 


1 BM 3UCHEN RUECKWAERTS 




JR 


SUCB1-# 




BiiVORs 


LB 


(ix+i©) 5 i 






JR 


SUCB2-# 




l GERAET E I N « AU£ 


S lN (IX+4) 




s BED. s 


KOMMANDO 




OPls 


LB 


(IX+5) ,L (ABEPi > 


5 ABRESSE E I NTR I TTSPKT . 




LB 


(IX+S) ,H (ABEPI) 






CALL 


BRKMB 


H KB. BRKMB— AUFRUF 


ABEPi i 


POP 


DE 


| BP RUECKSETZEN 




RET 






| BLOCK 


SCHREIBEN/LESEN 




g BEB= 


KOMMANDO 


GEL. 




OP2 e 


LB 


CIX+5) , L (ABEP2) 


5 ABRESSE E I NTR I TTSPKT . 




LB 


(IX+6) .HCADEP2) 






CALL 


BRKMB 


1 KS. BRKMB -AUFRUF 


arms 


HALT 








JR 


ARMS©-# 




ABEP2i 


POP 


BE 






BIT 


/ , (IX) 


l FEHLERAUSWERTUNG 




RZ 








POP 


BC 


pSP ERHOEHEN 




JMP 


M4 




s UMSPULEN 






UNSPU s 


LB 


(IX+4) 3 21H 


\ 




CALL 


UPi 




UMSPs 


CALL 


' BERT 






uRC 


UMSP— # 






RET 







i SCHREIBE 



jUHSK i 



CALL 

LB 

CALL 

LB 

INC 

LB 

RET 



"OR KASSE I T t. 
KAVOR 
(IX+4) 5 0 
UP 2 

HL s < ZAEHL) 
HL 

czaehl) ,hl 



i Z Afc,HLfc.R+ I 



? SUCHE BA i E I AU! 
SUBAKs CALL 
I UMSPULEN 
M62 i CALL 

i 2— TE BANBHARKE 
LB 
LB 

CALL 

LB 

CALL 

Lb 

LB 

CMP 

JRNZ 



: K ASSET TE, C 
KAVOR 

UNSPU 

SUCREM <INH£ 
< IX+10) 5 2 
(IX+4) ,71H 
UP 2 

(IX+4) *02H 
UP 2 

HL 9 (EAIAJ3 + /J 
A , 2©R 
M 

M62-# 



■1 (FILE NIGHT VQRH. > CY-0 (FILE VORHL ) 



NHALTSVERZi. > 



1 . BLOCK LESEN (AUSGLEIGH. . . 

I N -HL. PUFFER ANFANGSABR . 

VSL - OB LEERZEICHEN 
FALSCHE BANBHARKE GEFUNDEN 



l ZE I SERB LOCK LESEN 



LB 

CALL 

LB 

LB 

LB 

CHP 



< i x +4 > 
UP2 

H ? ( I X+3 ) 
L , i I X+7 ) 
A « 0 
M ' 



INHALTSVERZ 



; VSL ,,OB ZE I GERBLOCK 




/ 



\ 



JRNZ M62-# | NEXN 

LB ( PUF AN > jHL ; PUFFERANF = SPE I CHERN 

INC HL 

LD DE s ZEI6E 

LD EC * 3 

LDIR 

LD ft , < R I CHT ) ; R 1 CHTUNGSENTSCHE I DUNG 

AND ft 

JRNZ M7-# 

5 INHALTSVERZ-VOLL? 

LD A* ( ZEIGE) 

CUP im ; MAX- FILE ZAHL 103 (BM = 104) 

JRNZ M7-# 

s FEHLERMELBi f 9DH 

LD % ft ? 60H 

LD ' > C , 9BH 

JMP FEHL 

i 1« INHALTSMEr E I CHN I SBLDCK LESEN 
H7% LD < I X+4) , 02 

CALL UP2 



5 BER FILEN AUF 2 SET ZEN 





LD 


A , 2 






LD 


(FILEN) ,ft 




1 h ILLN 


> ZEIGERNR.? 




m-z 


LD 


ft, (FILEN) 






LD 


C,A 






LD 


A, (ZEIGE) 


, 




CMP 


C 


\ 




RC 




sCY=i,FILE NIGHT GEFUNDEN— >AUSSPRUNS 




LD 


HL 5 (EATAE+7) 






LD 


BC ,6 






CALL 


CRCR 






LD 


HL, CPCRC) 






,SCF 








CCF 








SBC 


HL , DE 


5 MGL , , GB FCRC-CRC 




JRNZ 


MS-# 


; FILE' NIGHT GLEICH 


I FILE 


GEFUNDEN 








- BCF 








CCF 








RET 






fei 


LD 


ft, (FILEN) 


<1 F XLEN+ 1 




INC 


ft' 






LD 


(FI LEN ) a A 




sNAECHSTEN BLOCK LESEN 






LD 


(XX*4> q 02H 


1 




CALL 


UP2 






JHP 


M9 




Ik ASSET TE MORE El 


RE I TEN 




KAVORs 


LD 


A , 55 H 


1 HIGH— TEIL VON orb ■ ADR KV01 




LD 








LD 


Ia.EATAB 





- RET 



e 

14 

1_ 


B I LDSCH I RMAUSSCHR 1 FTEN *********** 




tXTSis 


DB 


M2 4 MR s MRES-20 ’ 




TXT02s 


DB 


* SENDEN 1 




TXT03s 


DB 


‘LAUFW-s ’ 




TXT04s 


DB 


‘NAMEs ‘ 




TXT05s 


DE 


*.TYPs ‘ 




TXT06s 


DB 


1 UEBERTRftGUNG FEHLERFREI ' 




TXT07 i 


DB 


' SENDER b'TARTEN ’ 




TXTBBs 


Db 


•EMPFAEWGER STARTEN ‘ 




TXT09s 


DB 


1 VON ‘ 




TXT IBs 


DB 


1 NACH * 




i X l 1 1 s 


DB 


1 E HP F AMGEN " 




TXTI2s 


DB 


* BE J. ih: * 





i ^^-ft 1 *^****** BERE I CHSVERE I NB ARUNBEN -s- * 4 i -jo -s -K- -s- -x- -a- -k- 



ZAELls 


BER 


1 


* ZAHLER i 


ZAEL2s 


BER 


1 


^ ii 9 

*C -far 


ZAEL3: 


BER 


1 


* T 

8 V.* 


ZAEL4s 


BER 


1 


5 “ 4 


ZAELSs 


BER 


i 


? " 5 


ZAEBMs 


BER 


1 


s ZftEHLER SUCHE BftNDMARKE 


SBLQKs 


BER 


*7 


\ ZftEHLER— GESENDETE BLOECKE 


EBLOKs 


BER 




| st EMPFANGENE 


ANFANs 


BER 


i 


; ANFANG EMP FANGS RUT I NE 


TIMED s 


BER 


i 


sl«> TIMEOUT 


PCKCs 


BER 


2 


: CRC— REST MON PROGRAMMNAME 




BEGINS 

§ESI1= 



CALL 



I NS I Q 



JMP EMPFA 

l VERB I NBUNSSAUFNAHHE 



VERBA s 


LB 

CALL 


A S CR 
ZSENB . 




CALL 


ZEMPF 




CHP 






JRZ 


DISKR-# 




LB 


A. (ZAELi ) 




INC 


A ' 




LB 


(ZAELi) ,A 




CHP 


MAXZ1 




JRNZ 


VERBA-# 




LB 


A , SYN 




CALL 


ZSENB 




LB 


A = 50H 




LB 

CALL 


C-S1H 

FEGKR 


s 


JMP 


ENBE 


H 

§ ENBE 


BER UEBERTRAGUNG 


£nbs 


LB 


A a ETX 




CALL 


ZSENB 




LB 


HL ? TXT06 




LB 


B » 0 


END is 


BJNZ 


• ENB1-# 




LB 

CALL 


BC, 17AOH 
AN ZB 




JMP 


ENBE 


I EMPFANG VON 


BATEN 


| EINGABE TYP, 


DEVICE, START 


Inpfas 


LB 


ft, (TYP) 
50H 




CMP 




JRZ 


ENL-# 




CMP 


53H 




-JRZ 


ENL-# 




LB 


A ? 50H 




LB 


C 3 ©2H 




CALL 


FEGKR 




JMP 


TX1 




call 


Y 




JRZ 


EMLF— # 




LB 


BC = 6S60H 




CALL 


BSCOE 




JMP 


EMPFA 


ENLFi 


X OR 


A 




LB 


(ZAEL5) ,A 




LB 


(ANFAN) :A 




LB 


HL = 1 




LB 


CEBLOK) ,HL 



l VERB I NDUNGSAUFNAHME 

folVERs CALL 2EMPF 

LB E,A 



I EMPFANG QUITTUNG 

, I . 0 n 

: MAX a VERSUCHSANZAHL ERREICHT 
I NEIN 

■JA~> ABBRUCH BER VERB I NDUNS 
; FEHLER: KEINE VERB INBUNG 



I UEBERTRAGUNG FEHLERFRE I 



EMPFANG 



s FEHLERCOBE 
§ FEHLERANZEIGE 



% RETTEN GES» ZEI CHEN 



5 EHPFANGEN BESKRIPTOR UNB CRC 



EllBISs Li? 

LB 

LB 

LB 

CALL 

EMB 1 2 e LB 
LB 

CALL 

LB 

CMP 

JRNZ 

INC 

LB 

CMP 



(AnFAN) 5 A 
B = i 9H 
Hl = STORE- 1 
EMPZ 

ML s STORE 
BC, 17H 
CRC 

a 5 e 

(ML) 

END I 3-# 

HL 

A,B 

(HL) 



END I 3s 



JRNZ 

JR 

LB 

CALL 



EMDI3-# 
END 1 1 — # 
A , NAK 
ZSENB 



; EHPFANGEN 34 ZEI CHEN 
s CRC BILBUNG 



CRC FEHLER 



5 CRC FEHLER 
5 CRC OKAY 






JR 


END IS-# 


% UNTERPROSRAMME 


■ UP ZEICHEN 


EMPFANGEN NIT 


zEMF'h s 


PUSH 


BC 




PUSH 

LB 

LB 


bTmax i 

BE-MAX2 




XOR 


A 




LB 


(TIMED > , A 


I EMP3 ; 


LB 


HL , a 
A, 1 


ZEMP2s 


LB 




OUT 


SIOBK 


\ 


IN 


SIOBK 




AND 


20H 




JRNZ 


FEHL1— # 




IN 


SIOBK 




BIT 


0 = A 




JRNZ 


ZEMPi-# 




INC 


HL 




PUSH 


HL 




XOR 


A 




SBC 


hl ¥ be 




POP 


HL 




JkNz 


ZEMP2-# 




BJNZ 


ZEMP3-# 




JR 


FEHL2-# 


ZEMF‘1 s 


IN 


SIQBB 


ZEHP4 s 


POP 


HL 




POP 


BC 




RET 




fe-ILl s 


LB 


A.5GH 




LB 


ClSBH 




CALL 


FESKR 




CALL 

LB 

CALL 


NSL 
A - NAK 
Z^EWB 




JR 


RUECK-# 


FEHL2 i 


LB 


A , 50H 




LB 


C,S CH 




CALL 


FEGKR 




LB 


A- i 




LB 


(TIMED) 5 A 




LB 

CMP 

JRZ 

CALL 

LB 

CALL 


' A.(ANFAN) 
0' 

ZE MP4-# 
MSL 
A , S YN 

zsend 


RUECKr 


POP 


HL 




POP 


BC 




POP 


HL 




JMP 


bNDE 


5 Up BENDt-N 


1 ZEICHEN 


1 SENBs 


PUSH 


BC 




PUSH 


i)E 




PUSH 


HL 


ZSEN1 s 


LB 


C, SIOBK 




IN 


D 




BIT 


Z^ENi“# 




JRZ 




OUT 


SIDED 




POP 


HL 




POP 


BE 




POP 


BC 




RET 




l MARTESCHLEIFE i SEC 


feSLs 


LB 


BE , 1 0O0 
B ■ 95 

JJE 




LB 


mLi & 


DEC 




LB 


a,e 




OR 


B 




JRNZ 


WSL1-# 




BJNZ 

RET 


WSL 1 —# 



I I NIT BIOs V24- 9603 BAUD 

Iiosts m 



§ NEUER VERSUCH 



:0 SEC. BERE I TSCHAFT 



% FEHLER? 

■ J A , STATUSFEHLER 
IAB PRASE LRS 
s ZEICHEN BA? 
i JA 



s MAXI NIGHT ERREICHT 
i FEHLER s 2© SEC GEMARTET 
; ZEI CHEN E I NLESEN 



; I SEC MARTEN 



% KEIN ZEICHEN BA 



5 SENBEPUFFER NIGHT LEER 



18H 



; KANALRESET 






DB 


04 H 




DB 


44H 




DB 


01H 




DB 


00H 




DB 


03H 




DB 


0C1H 




DB 






DB 


SEAN 


PORT £ 


DB 


SIOBK 


iNblUs 


LD 


A f < PORT) 




LB 


C,A 




LD 


B , 9 




LD 

□TIR 


HL 5 S I OST 


CTCINs 


LD 


C , C-TC2 




LD 


A 5 55H 




OUT 


A 




LD 


A ? 4 




OUT 

RET 


A 


l EH PF AN GEN VON 


ZEICHEN 



s B i ANZ AHL 

l HLsABR EMPFANGSPliFFER-i 



EfiPz s 


INC 


HL 




LD 


A- 1 
SIOBK 




OUT 




IN 


SlOBK 




AND 


70H 




JRNZ 


FEM1-# 




PUSH 


B C 




LD 


B . 30H 




LD 


©£-0 


EMWs 


IN 


SIOBK 




BIT 


0,A 




JRNZ 


NZDA-# 




DEC 


BE 




LB 


A.E 




OR 


J> 




JRNZ 


EMM-# 




BJNZ 


EMW-# 




HOP 


BC 




JMP 


FEM2— # 


NZDAs 


POP 


EC 




IN 


SIDED 




LD 


(HL) » A 




BJNZ 

RET 


EMPZ-# 


FEN 1 £ 


LD 


A - 50H 




LD 


C J SBH 




CALL 


fEgkr 




JR 


FEME-# 


FEM2s . 


LD 


A.50H 




LD 


c;sch 




CALL 


FEBKR 


FEHEs 


POP 


HL 




JMP 


ENDE 



s POINTER 

; VORTEILER 16 , STOP-BIT 
“POINTER 
? BI 

s POINTER 

5 S BIT, AUTOEMPFANG EIN 
I POINTER 

•S BIT SENDEN EIN 



|LR1 POINTER 



% AUSBLENBEN FEHLER 
5 ST ATUBFEHLER 

gWSL CA= 1,5 MIN 



P ZEICHEN DA 



RET-ADR 



I SENDEN VON ZEICHEN 
- v. s ANZ AHL 
5 HL s ADR SENDEPUFFER-1 






fcNDR : 



NSW1 1 



FSPM s 



INC 


HL 


LD 


A- (HL> 


LB 


C: SIOBK 


IN 


B 


BIT 


2 ? D 


JRZ 


FSPV-# 


OUT 


SIGBB 


PUSH 


BC 


LD 


B ,0 


BJNZ 


NSW 1 — # 


POP 


BC 


IN 


D 


BIT 


2 , B 


JRZ 


Fb'PV— # 


DJNZ 

RET 


SENIOR-# 


POP 


HL 


LD 


A , SBH 


LD 

CALL 


C , SAH 
FEBKR 


JMP 


ENDE 



% SENBEPUFFER 310 VQLL 



I ZEICHEN NICHT ABGESETZT 



\ RET-ADR 




